home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 16
/
016.d81
/
bach boot
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
459b
|
17 lines
10 rem bach boot
50 print"[147]":poke53280,5
60 print" [215]hich would you like?"
70 print" 1. [194]ach [200]appy"
80 print" 2. [194]ach [211]ad
90 [153]" 3. (NULL)eturn to (NULL)(NULL)atnstr$(NULL)(NULL)atn(NULL)"
95 [153]"(NULL)lease make a selection."
97 [151]198,0:[146]198,1:[161]r$
98 [139]r$[179][177]"1"[175]r$[179][177]"2"[175]r$[179][177]"3"[167][151]53280,[187](1)[172]15:[153]"onononon";:[137]95
99 :
100 [139]r$[178]"1"[167]f$[178]"bach happy.bas"
110 [139]r$[178]"2"[167]f$[178]"bach sad.bas"
120 [139]r$[178]"3"[167]f$[178]"payload"
130 :
140 [153]"loadload"[199](34)f$[199](34)",8":[153]"run"
150 [151]631,13:[151]632,13:[151]198,2:[128]